home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The X-Philes (2nd Revision)
/
The X-Philes Number 1 (1995).iso
/
xphiles
/
hp48_1
/
howlong_
< prev
next >
Wrap
Internet Message Format
|
1995-03-31
|
4KB
From: Thomas Pagel <Thomas.Pagel@unnet.w.open.DE>
Subject: v04i045: howlong_tp - Give a countdown time for an event v1.0, Part01/01
Newsgroups: comp.sources.hp48
Organization: THE UNDERGROUND NETWORK
Followup-To: comp.sys.hp48
Approved: spell@seq.uncwil.edu
Checksum: 393892050 (verify with brik -cv)
Submitted-by: Thomas Pagel <Thomas.Pagel@unnet.w.open.DE>
Posting-number: Volume 4, Issue 45
Archive-name: howlong_tp/part01
BEGIN_DOC howlong.doc
When do you have your next date or exam?
This litte HP48 program encoded with the ASC-Tool gives you
information how long it lasts to the event, you set time
and date for.
At the beginning of the program, you find two parameters in
brackets. These has to be changed in the following way:
{time month.dayYear}
like the usual data format of the HP48.
Start the programm and it tells you:
------------------
How long?
118d 4h 12min 24s
or 2836,2 hour(s)
------------------
Make sure, that you have enough time be prepared for you event!
To quit the programm, just press <Return>. Otherwise you will have
useless variable in your menu....
Good luck and always enough time to be prepared for your date..
Thomas
Internet: thomas.pagel@unnet.w.open.de
END_DOC
BEGIN_ASC howlong.asc
%%HP: T(1)A(D)F(.);
"D9D20E163247A20339201000000000000810339200000000029918040B2130B7
FC18DBF11C432D6E20304594D4D6E2030441445E1632858A13C032D6E2030441
44521891DBBF12B9914563284E20104597632DCC023CE227F791D6E20304594D
4D5CE1AFE22D9D204563284E20104597632AA9028DBF13392010000000000004
207F791D6E20304594D4E7FB1E7FB178BF1D6BB14563284E20103597632DCC02
3ABB1339202000000000000010EEDA1D6BB14563284E2010D497632DCC02B213
05BF22D9D20D6E20304594D47F791E7FB178BF1D6BB14563284E20103597632D
CC023ABB1339202000000000000010EEDA1D6BB14563284E2010D497632DCC02
B21305DF227F791339202000000000000010EEDA13ABB1339202000000000000
010EEDA1D6BB1339201000000000000060DBBF190DA14563284E203035543497
632DCC024563284E2010459763204B02339201000000000000420EEDA1456328
4E2010359763204B0276BA14563284E2020354597632DCC02C2A205200002020
20284F47502C4F4E47402F3A0A04563284E2010459763204B02B0BC1C2A20900
00460276BA176BA14563284E2010359763204B02B0BC1C2A2090000860276BA1
76BA14563284E2010D49763204B02B0BC1C2A20D0000D696E6024563284E2030
3554349763204B02C2A20B000037A0A076BA176BA176BA176BA1C2A20B0000F6
27024563284E202035459763204B02ED2A255DB1B0BC14563284E2010D497632
04B0233920200000000000001050FA1E3FB19C2A255DB1B0BC1C2A2071000028
6F657278237921276BA176BA176BA176BA19C2A2485A1DE032378A19B63247A2
084E203035543484E2020354584E2010D484E20103584E201045B2130EFE028D
BF1EF53293632B213049FC"
END_ASC
BYTES: #CF94h 649
BEGIN_UU howlong.uue
begin 644 howlong
M2%!(4#0X+46=+>!A(W0J,),"`0``````@`$S*0`````@F8%`L!(#>\^!O1_!
M--+F`@-424UM+C!`%$3E82-8J#$,(VTN,$`41"6!&;W[(9L95#:"Y`(!5'DV
MTLP@PRYR?QEM+C!`E=34Q1[Z+M+9`E0V@N0"`51Y-J*:(-C[,9,"`0``````
M0`+WE]'F`@-424U^O^'W&X?[T;8;5#:"Y`(!4WDVTLP@H[LQDP("````````
M`>ZMT;8;5#:"Y`(!37DVTLP@*S%0^R*=+=#F`@-424WWE^'W&X?[T;8;5#:"
MY`(!4WDVTLP@H[LQDP("`````````>ZMT;8;5#:"Y`(!37DVTLP@*S%0_2+W
MES&3`@(````````![JTQNALS*2`````````0X-X:;;LQDP(!````````!KW[
MD=`:5#:"Y`(#4T5#>3;2S"!4-H+D`@%4>38"M"`S*1`````````DX-X:5#:"
MY`(!4WDV`K0@9ZM!92-(+B`P195G(\T,PJ(")0```@("@O1T!<+TY'0$\J.@
M0&4C2"X00)5G(T`+LK`<+"J0``!D(&>K<;8:5#:"Y`(!4WDV`K0@"\O!H@()
M`(`&<K8:9ZM!92-(+A#0E&<C0`NRL!PL*M```&UI;B!4-H+D`@-314-Y-@*T
M("PJL```<PH*9ZMQMAIGJW&V&BPJL```;W(@5#:"Y`("4U1Y-@*T(-ZB4M4;
M"\M!92-(+A#0E&<C0`LRDP("`````````06OX?,;R:)2U1L+R\&B`A<``(+V
M5B>',I<2<K8:9ZMQMAIGJY$L*H2ET0XC<ZB1:R-T*H#D`@-314-(+B`P187D
;`@%-2"X0,(7D`@%4*S'@[R#8^^%?(SDVLA(#
`
end
END_UU